﻿Namespace B1Data
    Public Interface ICodeRule
        Property ForePart As String
        Property BackPart As String
        ReadOnly Property FieldName As String
        ReadOnly Property CurrentCode As String
        Function NextCode() As String
        Function NextCode(ByVal ParamArray fatherCode() As Object) As String
        Sub RefreshCurrenCode()
        Sub RefreshCurrenCode(ByVal Key As Object)
        'Sub SetParam(ByVal ParamArray Items() As Object)

    End Interface
End Namespace

